home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-04 / smalltlk.zip / PRELUDE / STANDARD < prev    next >
Text File  |  1990-09-13  |  55KB  |  2,037 lines
  1. temp <- <primitive 110 10 >
  2. <primitive 112 temp 1        " view " \
  3.     #( #[ 32 250 1 156 242 245] \
  4.     #(  ) ) >
  5.  
  6. <primitive 112 temp 2        " variables " \
  7.     #( #[ 32 250 1 158 243 245] \
  8.     #(  ) ) >
  9.  
  10. <primitive 112 temp 3        " superClass " \
  11.     #( #[ 32 250 1 151 243 245] \
  12.     #(  ) ) >
  13.  
  14. <primitive 112 temp 4        " respondsTo: " \
  15.     #( #[ 32 114 34 162 247 18 34 33 250 2 155 247 2 91 243 \
  16.  242 34 10 46 241 114 242 249 22 242 92 243 245] \
  17.     #(  ) ) >
  18.  
  19. <primitive 112 temp 5        " respondsTo " \
  20.     #( #[ 32 250 1 154 242 245] \
  21.     #(  ) ) >
  22.  
  23. <primitive 112 temp 6        " printString " \
  24.     #( #[ 32 250 1 152 243 245] \
  25.     #(  ) ) >
  26.  
  27. <primitive 112 temp 7        " new: " \
  28.     #( #[ 32 250 1 151 114 34 250 1 3 247 4 34 160 241 115 \
  29.  242 32 35 250 2 153 115 32 48 250 2 155 247 5 35 \
  30.  33 176 241 115 242 35 243 245] \
  31.     #( #new:  ) ) >
  32.  
  33. <primitive 112 temp 8        " new " \
  34.     #( #[ 32 250 1 151 113 33 250 1 3 247 4 33 160 241 114 \
  35.  242 32 34 250 2 153 114 32 48 250 2 155 247 4 34 \
  36.  160 241 114 242 34 243 245] \
  37.     #( #new  ) ) >
  38.  
  39. <primitive 112 temp 9        " list " \
  40.     #( #[ 32 250 1 157 242 245] \
  41.     #(  ) ) >
  42.  
  43. <primitive 112 temp 10        " edit " \
  44.     #( #[ 32 250 1 150 242 245] \
  45.     #(  ) ) >
  46.  
  47. <primitive 98 #Class \
  48.     <primitive 97 #Class #Object #\smalltlk\prelude\class.st \
  49.     #(  ) \
  50.     #( #view #variables #superClass #respondsTo: #respondsTo #printString #new: #new #list #edit  ) \
  51.     temp 4 4 > >
  52.  
  53. temp <- <primitive 110 21 >
  54. <primitive 112 temp 1        " shallowCopy " \
  55.     #( #[ 32 250 1 4 113 33 80 199 247 4 32 243 248 26 242 \
  56.  32 164 160 114 81 33 178 225 3 11 34 35 32 35 250 \
  57.  2 111 250 3 112 243 179 242 34 243 242 245] \
  58.     #(  ) ) >
  59.  
  60. <primitive 112 temp 2        " respondsTo: " \
  61.     #( #[ 32 164 33 11 41 243 245] \
  62.     #(  ) ) >
  63.  
  64. <primitive 112 temp 3        " printString " \
  65.     #( #[ 32 10 16 243 245] \
  66.     #(  ) ) >
  67.  
  68. <primitive 112 temp 4        " print " \
  69.     #( #[ 32 169 250 1 121 242 245] \
  70.     #(  ) ) >
  71.  
  72. <primitive 112 temp 5        " notNil " \
  73.     #( #[ 91 243 245] \
  74.     #(  ) ) >
  75.  
  76. <primitive 112 temp 6        " next " \
  77.     #( #[ 93 243 245] \
  78.     #(  ) ) >
  79.  
  80. <primitive 112 temp 7        " isNil " \
  81.     #( #[ 92 243 245] \
  82.     #(  ) ) >
  83.  
  84. <primitive 112 temp 8        " isMemberOf: " \
  85.     #( #[ 33 32 164 181 243 245] \
  86.     #(  ) ) >
  87.  
  88. <primitive 112 temp 9        " isKindOf: " \
  89.     #( #[ 32 164 114 34 162 247 16 34 33 181 247 2 91 243 242 \
  90.  34 10 46 241 114 242 249 20 242 92 243 245] \
  91.     #(  ) ) >
  92.  
  93. <primitive 112 temp 10        " first " \
  94.     #( #[ 32 243 245] \
  95.     #(  ) ) >
  96.  
  97. <primitive 112 temp 11        " error: " \
  98.     #( #[ 33 32 250 2 122 242 245] \
  99.     #(  ) ) >
  100.  
  101. <primitive 112 temp 12        " do: " \
  102.     #( #[ 32 166 114 34 162 247 11 33 34 180 242 32 167 241 114 \
  103.  242 249 15 243 245] \
  104.     #(  ) ) >
  105.  
  106. <primitive 112 temp 13        " deepCopy " \
  107.     #( #[ 32 250 1 4 113 33 80 199 247 4 32 243 248 28 242 \
  108.  32 164 160 114 81 33 178 225 3 13 34 35 32 35 250 \
  109.  2 111 10 20 250 3 112 243 179 242 34 243 242 245] \
  110.     #(  ) ) >
  111.  
  112. <primitive 112 temp 14        " copy " \
  113.     #( #[ 32 10 42 243 245] \
  114.     #(  ) ) >
  115.  
  116. <primitive 112 temp 15        " class " \
  117.     #( #[ 32 250 1 1 243 245] \
  118.     #(  ) ) >
  119.  
  120. <primitive 112 temp 16        " asSymbol " \
  121.     #( #[ 32 10 16 10 17 243 245] \
  122.     #(  ) ) >
  123.  
  124. <primitive 112 temp 17        " asString " \
  125.     #( #[ 32 164 169 243 245] \
  126.     #(  ) ) >
  127.  
  128. <primitive 112 temp 18        " ~= " \
  129.     #( #[ 32 33 201 172 243 245] \
  130.     #(  ) ) >
  131.  
  132. <primitive 112 temp 19        " = " \
  133.     #( #[ 32 33 181 243 245] \
  134.     #(  ) ) >
  135.  
  136. <primitive 112 temp 20        " ~~ " \
  137.     #( #[ 32 33 181 172 243 245] \
  138.     #(  ) ) >
  139.  
  140. <primitive 112 temp 21        " == " \
  141.     #( #[ 32 33 250 2 7 243 245] \
  142.     #(  ) ) >
  143.  
  144. <primitive 98 #Object \
  145.     <primitive 97 #Object #Object #\smalltlk\prelude\object.st \
  146.     #(  ) \
  147.     #( #shallowCopy #respondsTo: #printString #print #notNil #next #isNil #isMemberOf: #isKindOf: #first #error: #do: #deepCopy #copy #class #asSymbol #asString #~= #= #~~ #==  ) \
  148.     temp 4 7 > >
  149.  
  150. temp <- <primitive 110 22 >
  151. <primitive 112 temp 1        " sameAs: " \
  152.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 102 248 4 242 \
  153.  32 10 19 243 245] \
  154.     #(  ) ) >
  155.  
  156. <primitive 112 temp 2        " size " \
  157.     #( #[ 32 250 1 100 243 245] \
  158.     #(  ) ) >
  159.  
  160. <primitive 112 temp 3        " printNoReturn " \
  161.     #( #[ 32 250 1 120 242 245] \
  162.     #(  ) ) >
  163.  
  164. <primitive 112 temp 4        " print " \
  165.     #( #[ 32 250 1 121 242 245] \
  166.     #(  ) ) >
  167.  
  168. <primitive 112 temp 5        " printString " \
  169.     #( #[ 32 250 1 109 243 245] \
  170.     #(  ) ) >
  171.  
  172. <primitive 112 temp 6        " printAt: " \
  173.     #( #[ 32 33 10 49 33 10 50 250 3 126 242 245] \
  174.     #(  ) ) >
  175.  
  176. <primitive 112 temp 7        " new: " \
  177.     #( #[ 33 250 1 115 243 245] \
  178.     #(  ) ) >
  179.  
  180. <primitive 112 temp 8        " deepCopy " \
  181.     #( #[ 32 250 1 107 243 245] \
  182.     #(  ) ) >
  183.  
  184. <primitive 112 temp 9        " copyFrom:length: " \
  185.     #( #[ 32 33 34 250 3 106 243 245] \
  186.     #(  ) ) >
  187.  
  188. <primitive 112 temp 10        " copyFrom:to: " \
  189.     #( #[ 32 33 34 33 193 81 192 250 3 106 243 245] \
  190.     #(  ) ) >
  191.  
  192. <primitive 112 temp 11        " compareError " \
  193.     #( #[ 32 48 188 243 245] \
  194.     #( 'strings can only be compared to strings'  ) ) >
  195.  
  196. <primitive 112 temp 12        " at:put: " \
  197.     #( #[ 32 33 34 250 3 105 242 245] \
  198.     #(  ) ) >
  199.  
  200. <primitive 112 temp 13        " at: " \
  201.     #( #[ 32 33 250 2 104 243 245] \
  202.     #(  ) ) >
  203.  
  204. <primitive 112 temp 14        " asSymbol " \
  205.     #( #[ 32 250 1 108 243 245] \
  206.     #(  ) ) >
  207.  
  208. <primitive 112 temp 15        " asFloat " \
  209.     #( #[ 32 250 1 165 243 245] \
  210.     #(  ) ) >
  211.  
  212. <primitive 112 temp 16        " asInteger " \
  213.     #( #[ 32 250 1 164 243 245] \
  214.     #(  ) ) >
  215.  
  216. <primitive 112 temp 17        " > " \
  217.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 204 248 \
  218.  4 242 32 10 19 243 245] \
  219.     #(  ) ) >
  220.  
  221. <primitive 112 temp 18        " >= " \
  222.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 203 248 \
  223.  4 242 32 10 19 243 245] \
  224.     #(  ) ) >
  225.  
  226. <primitive 112 temp 19        " <= " \
  227.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 200 248 \
  228.  4 242 32 10 19 243 245] \
  229.     #(  ) ) >
  230.  
  231. <primitive 112 temp 20        " < " \
  232.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 199 248 \
  233.  4 242 32 10 19 243 245] \
  234.     #(  ) ) >
  235.  
  236. <primitive 112 temp 21        " = " \
  237.     #( #[ 32 33 250 2 6 247 9 32 33 250 2 101 80 201 248 \
  238.  4 242 32 10 19 243 245] \
  239.     #(  ) ) >
  240.  
  241. <primitive 112 temp 22        " , " \
  242.     #( #[ 32 32 33 250 2 6 247 3 33 248 3 242 33 169 250 \
  243.  2 103 243 245] \
  244.     #(  ) ) >
  245.  
  246. <primitive 98 #String \
  247.     <primitive 97 #String #ArrayedCollection #\smalltlk\prelude\string.st \
  248.     #(  ) \
  249.     #( #sameAs: #size #printNoReturn #print #printString #printAt: #new: #deepCopy #copyFrom:length: #copyFrom:to: #compareError #at:put: #at: #asSymbol #asFloat #asInteger #> #>= #<= #< #= #,  ) \
  250.     temp 3 5 > >
  251.  
  252. temp <- <primitive 110 1 >
  253. <primitive 112 temp 1        " nothing " \
  254.     #( #[ 81 242 245] \
  255.     #(  ) ) >
  256.  
  257. <primitive 98 #ArrayedCollection \
  258.     <primitive 97 #ArrayedCollection #Object #\smalltlk\prelude\larray.st \
  259.     #(  ) \
  260.     #( #nothing  ) \
  261.     temp 1 2 > >
  262.  
  263. temp <- <primitive 110 3 >
  264. <primitive 112 temp 1        " printString " \
  265.     #( #[ 48 243 245] \
  266.     #( 'nil'  ) ) >
  267.  
  268. <primitive 112 temp 2        " notNil " \
  269.     #( #[ 92 243 245] \
  270.     #(  ) ) >
  271.  
  272. <primitive 112 temp 3        " isNil " \
  273.     #( #[ 91 243 245] \
  274.     #(  ) ) >
  275.  
  276. <primitive 98 #UndefinedObject \
  277.     <primitive 97 #UndefinedObject #Object #\smalltlk\prelude\nil.st \
  278.     #(  ) \
  279.     #( #printString #notNil #isNil  ) \
  280.     temp 1 2 > >
  281.  
  282. temp <- <primitive 110 6 >
  283. <primitive 112 temp 1        " size " \
  284.     #( #[ 32 250 1 4 243 245] \
  285.     #(  ) ) >
  286.  
  287. <primitive 112 temp 2        " printString " \
  288.     #( #[ 48 113 32 250 1 4 114 34 80 204 247 21 32 34 250 \
  289.  2 111 169 49 11 17 33 11 17 113 34 81 193 241 114 \
  290.  242 249 26 242 50 33 11 17 243 245] \
  291.     #( ')' ' ' '#( '  ) ) >
  292.  
  293. <primitive 112 temp 3        " grow: " \
  294.     #( #[ 32 33 250 2 113 243 245] \
  295.     #(  ) ) >
  296.  
  297. <primitive 112 temp 4        " at:put: " \
  298.     #( #[ 33 81 199 251 6 33 32 250 1 4 204 247 6 32 48 \
  299.  188 242 93 243 242 32 33 34 250 3 112 242 34 243 245 \
  300. ] \
  301.     #( 'index error'  ) ) >
  302.  
  303. <primitive 112 temp 5        " at: " \
  304.     #( #[ 33 81 199 251 6 33 32 250 1 4 204 247 6 32 48 \
  305.  188 242 93 243 242 32 33 250 2 111 243 245] \
  306.     #( 'index error'  ) ) >
  307.  
  308. <primitive 112 temp 6        " new: " \
  309.     #( #[ 33 250 1 114 243 245] \
  310.     #(  ) ) >
  311.  
  312. <primitive 98 #Array \
  313.     <primitive 97 #Array #ArrayedCollection #\smalltlk\prelude\array.st \
  314.     #(  ) \
  315.     #( #size #printString #grow: #at:put: #at: #new:  ) \
  316.     temp 3 4 > >
  317.  
  318. temp <- <primitive 110 6 >
  319. <primitive 112 temp 1        " xor: " \
  320.     #( #[ 32 33 182 243 245] \
  321.     #(  ) ) >
  322.  
  323. <primitive 112 temp 2        " eqv: " \
  324.     #( #[ 32 33 181 243 245] \
  325.     #(  ) ) >
  326.  
  327. <primitive 112 temp 3        " or: " \
  328.     #( #[ 32 251 2 33 165 243 245] \
  329.     #(  ) ) >
  330.  
  331. <primitive 112 temp 4        " and: " \
  332.     #( #[ 32 252 2 33 165 243 245] \
  333.     #(  ) ) >
  334.  
  335. <primitive 112 temp 5        " | " \
  336.     #( #[ 32 251 1 33 243 245] \
  337.     #(  ) ) >
  338.  
  339. <primitive 112 temp 6        " & " \
  340.     #( #[ 32 252 1 33 243 245] \
  341.     #(  ) ) >
  342.  
  343. <primitive 98 #Boolean \
  344.     <primitive 97 #Boolean #Object #\smalltlk\prelude\boolean.st \
  345.     #(  ) \
  346.     #( #xor: #eqv: #or: #and: #| #&  ) \
  347.     temp 2 3 > >
  348.  
  349. temp <- <primitive 110 5 >
  350. <primitive 112 temp 1        " not " \
  351.     #( #[ 92 243 245] \
  352.     #(  ) ) >
  353.  
  354. <primitive 112 temp 2        " ifFalse: " \
  355.     #( #[ 93 243 245] \
  356.     #(  ) ) >
  357.  
  358. <primitive 112 temp 3        " ifTrue: " \
  359.     #( #[ 33 165 243 245] \
  360.     #(  ) ) >
  361.  
  362. <primitive 112 temp 4        " ifFalse:ifTrue: " \
  363.     #( #[ 34 165 243 245] \
  364.     #(  ) ) >
  365.  
  366. <primitive 112 temp 5        " ifTrue:ifFalse: " \
  367.     #( #[ 33 165 243 245] \
  368.     #(  ) ) >
  369.  
  370. <primitive 98 #True \
  371.     <primitive 97 #True #Boolean #\smalltlk\prelude\true.st \
  372.     #(  ) \
  373.     #( #not #ifFalse: #ifTrue: #ifFalse:ifTrue: #ifTrue:ifFalse:  ) \
  374.     temp 3 2 > >
  375.  
  376. temp <- <primitive 110 5 >
  377. <primitive 112 temp 1        " not " \
  378.     #( #[ 91 243 245] \
  379.     #(  ) ) >
  380.  
  381. <primitive 112 temp 2        " ifFalse: " \
  382.     #( #[ 33 165 243 245] \
  383.     #(  ) ) >
  384.  
  385. <primitive 112 temp 3        " ifTrue: " \
  386.     #( #[ 93 243 245] \
  387.     #(  ) ) >
  388.  
  389. <primitive 112 temp 4        " ifFalse:ifTrue: " \
  390.     #( #[ 33 165 243 245] \
  391.     #(  ) ) >
  392.  
  393. <primitive 112 temp 5        " ifTrue:ifFalse: " \
  394.     #( #[ 34 165 243 245] \
  395.     #(  ) ) >
  396.  
  397. <primitive 98 #False \
  398.     <primitive 97 #False #Boolean #\smalltlk\prelude\false.st \
  399.     #(  ) \
  400.     #( #not #ifFalse: #ifTrue: #ifFalse:ifTrue: #ifTrue:ifFalse:  ) \
  401.     temp 3 2 > >
  402.  
  403. temp <- <primitive 110 14 >
  404. <primitive 112 temp 1        " value:value:value:value:value: " \
  405.     #( #[ 85 250 1 140 242 245] \
  406.     #(  ) ) >
  407.  
  408. <primitive 112 temp 2        " value:value:value:value: " \
  409.     #( #[ 84 250 1 140 242 245] \
  410.     #(  ) ) >
  411.  
  412. <primitive 112 temp 3        " value:value:value: " \
  413.     #( #[ 83 250 1 140 242 245] \
  414.     #(  ) ) >
  415.  
  416. <primitive 112 temp 4        " value:value: " \
  417.     #( #[ 82 250 1 140 242 245] \
  418.     #(  ) ) >
  419.  
  420. <primitive 112 temp 5        " value: " \
  421.     #( #[ 81 250 1 140 242 245] \
  422.     #(  ) ) >
  423.  
  424. <primitive 112 temp 6        " value " \
  425.     #( #[ 80 250 1 140 242 245] \
  426.     #(  ) ) >
  427.  
  428. <primitive 112 temp 7        " whileFalse: " \
  429.     #( #[ 32 165 246 5 33 165 242 249 9 243 245] \
  430.     #(  ) ) >
  431.  
  432. <primitive 112 temp 8        " whileFalse " \
  433.     #( #[ 32 165 246 4 93 242 249 8 243 245] \
  434.     #(  ) ) >
  435.  
  436. <primitive 112 temp 9        " whileTrue: " \
  437.     #( #[ 32 165 247 5 33 165 242 249 9 243 245] \
  438.     #(  ) ) >
  439.  
  440. <primitive 112 temp 10        " whileTrue " \
  441.     #( #[ 32 165 247 4 93 242 249 8 243 245] \
  442.     #(  ) ) >
  443.  
  444. <primitive 112 temp 11        " forkWith: " \
  445.     #( #[ 32 33 11 35 10 40 242 93 243 245] \
  446.     #(  ) ) >
  447.  
  448. <primitive 112 temp 12        " fork " \
  449.     #( #[ 32 10 33 10 40 242 93 243 245] \
  450.     #(  ) ) >
  451.  
  452. <primitive 112 temp 13        " newProcessWith: " \
  453.     #( #[ 32 33 250 2 141 243 245] \
  454.     #(  ) ) >
  455.  
  456. <primitive 112 temp 14        " newProcess " \
  457.     #( #[ 32 250 1 141 243 245] \
  458.     #(  ) ) >
  459.  
  460. <primitive 98 #Block \
  461.     <primitive 97 #Block #Object #\smalltlk\prelude\block.st \
  462.     #(  ) \
  463.     #( #value:value:value:value:value: #value:value:value:value: #value:value:value: #value:value: #value: #value #whileFalse: #whileFalse #whileTrue: #whileTrue #forkWith: #fork #newProcessWith: #newProcess  ) \
  464.     temp 6 3 > >
  465.  
  466. temp <- <primitive 110 3 >
  467. <primitive 112 temp 1        " asString " \
  468.     #( #[ 32 250 1 93 243 245] \
  469.     #(  ) ) >
  470.  
  471. <primitive 112 temp 2        " printString " \
  472.     #( #[ 32 250 1 92 243 245] \
  473.     #(  ) ) >
  474.  
  475. <primitive 112 temp 3        " == " \
  476.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 91 248 2 242 \
  477.  92 243 245] \
  478.     #(  ) ) >
  479.  
  480. <primitive 98 #Symbol \
  481.     <primitive 97 #Symbol #Object #\smalltlk\prelude\symbol.st \
  482.     #(  ) \
  483.     #( #asString #printString #==  ) \
  484.     temp 2 4 > >
  485.  
  486. temp <- <primitive 110 9 >
  487. <primitive 112 temp 1        " max: " \
  488.     #( #[ 32 33 204 247 3 32 248 2 242 33 243 245] \
  489.     #(  ) ) >
  490.  
  491. <primitive 112 temp 2        " min: " \
  492.     #( #[ 32 33 199 247 3 32 248 2 242 33 243 245] \
  493.     #(  ) ) >
  494.  
  495. <primitive 112 temp 3        " between:and: " \
  496.     #( #[ 32 33 203 252 3 32 34 200 243 245] \
  497.     #(  ) ) >
  498.  
  499. <primitive 112 temp 4        " > " \
  500.     #( #[ 33 32 199 243 245] \
  501.     #(  ) ) >
  502.  
  503. <primitive 112 temp 5        " >= " \
  504.     #( #[ 32 33 204 251 3 32 33 201 243 245] \
  505.     #(  ) ) >
  506.  
  507. <primitive 112 temp 6        " ~= " \
  508.     #( #[ 32 33 201 172 243 245] \
  509.     #(  ) ) >
  510.  
  511. <primitive 112 temp 7        " = " \
  512.     #( #[ 32 33 204 251 3 32 33 199 172 243 245] \
  513.     #(  ) ) >
  514.  
  515. <primitive 112 temp 8        " < " \
  516.     #( #[ 33 32 204 243 245] \
  517.     #(  ) ) >
  518.  
  519. <primitive 112 temp 9        " <= " \
  520.     #( #[ 32 33 199 251 3 32 33 201 243 245] \
  521.     #(  ) ) >
  522.  
  523. <primitive 98 #Magnitude \
  524.     <primitive 97 #Magnitude #Object #\smalltlk\prelude\magnitud.st \
  525.     #(  ) \
  526.     #( #max: #min: #between:and: #> #>= #~= #= #< #<=  ) \
  527.     temp 3 4 > >
  528.  
  529. temp <- <primitive 110 30 >
  530. <primitive 112 temp 1        " truncateTo: " \
  531.     #( #[ 32 33 190 10 47 33 194 243 245] \
  532.     #(  ) ) >
  533.  
  534. <primitive 112 temp 2        " to:by: " \
  535.     #( #[ 5 46 160 241 32 33 34 131 0 242 243 245] \
  536.     #( #from:to:by:  ) ) >
  537.  
  538. <primitive 112 temp 3        " to: " \
  539.     #( #[ 5 46 160 241 32 33 81 131 0 242 243 245] \
  540.     #( #from:to:by:  ) ) >
  541.  
  542. <primitive 112 temp 4        " strictlyPositive " \
  543.     #( #[ 32 80 204 243 245] \
  544.     #(  ) ) >
  545.  
  546. <primitive 112 temp 5        " squared " \
  547.     #( #[ 32 32 194 243 245] \
  548.     #(  ) ) >
  549.  
  550. <primitive 112 temp 6        " sqrt " \
  551.     #( #[ 32 175 10 43 243 245] \
  552.     #(  ) ) >
  553.  
  554. <primitive 112 temp 7        " sign " \
  555.     #( #[ 32 80 199 247 3 90 248 11 242 32 80 204 247 3 81 \
  556.  248 2 242 80 243 245] \
  557.     #(  ) ) >
  558.  
  559. <primitive 112 temp 8        " roundTo: " \
  560.     #( #[ 32 33 190 10 41 33 194 243 245] \
  561.     #(  ) ) >
  562.  
  563. <primitive 112 temp 9        " reciprocal " \
  564.     #( #[ 48 32 190 243 245] \
  565.     #( 1.00  ) ) >
  566.  
  567. <primitive 112 temp 10        " raisedTo: " \
  568.     #( #[ 32 175 33 175 11 16 243 245] \
  569.     #(  ) ) >
  570.  
  571. <primitive 112 temp 11        " radians " \
  572.     #( #[ 5 54 32 175 176 243 245] \
  573.     #(  ) ) >
  574.  
  575. <primitive 112 temp 12        " positive " \
  576.     #( #[ 32 80 203 243 245] \
  577.     #(  ) ) >
  578.  
  579. <primitive 112 temp 13        " pi " \
  580.     #( #[ 32 48 194 243 245] \
  581.     #( 3.1415926  ) ) >
  582.  
  583. <primitive 112 temp 14        " negative " \
  584.     #( #[ 32 80 199 243 245] \
  585.     #(  ) ) >
  586.  
  587. <primitive 112 temp 15        " negated " \
  588.     #( #[ 80 32 193 243 245] \
  589.     #(  ) ) >
  590.  
  591. <primitive 112 temp 16        " log: " \
  592.     #( #[ 32 10 32 33 10 32 190 243 245] \
  593.     #(  ) ) >
  594.  
  595. <primitive 112 temp 17        " ln " \
  596.     #( #[ 32 175 10 32 243 245] \
  597.     #(  ) ) >
  598.  
  599. <primitive 112 temp 18        " gamma " \
  600.     #( #[ 32 175 10 26 243 245] \
  601.     #(  ) ) >
  602.  
  603. <primitive 112 temp 19        " exp " \
  604.     #( #[ 32 175 10 23 243 245] \
  605.     #(  ) ) >
  606.  
  607. <primitive 112 temp 20        " abs " \
  608.     #( #[ 32 80 199 247 5 80 32 193 248 2 242 32 243 245] \
  609.     #(  ) ) >
  610.  
  611. <primitive 112 temp 21        " @ " \
  612.     #( #[ 5 53 160 32 11 50 33 11 51 243 245] \
  613.     #(  ) ) >
  614.  
  615. <primitive 112 temp 22        " ^ " \
  616.     #( #[ 32 175 33 175 11 16 243 245] \
  617.     #(  ) ) >
  618.  
  619. <primitive 112 temp 23        " / " \
  620.     #( #[ 32 33 11 34 33 32 11 34 190 243 245] \
  621.     #(  ) ) >
  622.  
  623. <primitive 112 temp 24        " * " \
  624.     #( #[ 32 33 11 34 33 32 11 34 194 243 245] \
  625.     #(  ) ) >
  626.  
  627. <primitive 112 temp 25        " - " \
  628.     #( #[ 32 33 11 34 33 32 11 34 193 243 245] \
  629.     #(  ) ) >
  630.  
  631. <primitive 112 temp 26        " + " \
  632.     #( #[ 32 33 11 34 33 32 11 34 192 243 245] \
  633.     #(  ) ) >
  634.  
  635. <primitive 112 temp 27        " > " \
  636.     #( #[ 32 33 11 34 33 32 11 34 204 243 245] \
  637.     #(  ) ) >
  638.  
  639. <primitive 112 temp 28        " < " \
  640.     #( #[ 32 33 11 34 33 32 11 34 199 243 245] \
  641.     #(  ) ) >
  642.  
  643. <primitive 112 temp 29        " = " \
  644.     #( #[ 32 33 11 34 33 32 11 34 201 243 245] \
  645.     #(  ) ) >
  646.  
  647. <primitive 112 temp 30        " maxtype: " \
  648.     #( #[ 32 33 250 2 9 247 3 32 248 4 242 33 32 191 243 \
  649.  245] \
  650.     #(  ) ) >
  651.  
  652. <primitive 98 #Number \
  653.     <primitive 97 #Number #Magnitude #\smalltlk\prelude\number.st \
  654.     #(  ) \
  655.     #( #truncateTo: #to:by: #to: #strictlyPositive #squared #sqrt #sign #roundTo: #reciprocal #raisedTo: #radians #positive #pi #negative #negated #log: #ln #gamma #exp #abs #@ #^ #/ #* #- #+ #> #< #= #maxtype:  ) \
  656.     temp 3 6 > >
  657.  
  658. temp <- <primitive 110 32 >
  659. <primitive 112 temp 1        " timesRepeat: " \
  660.     #( #[ 80 114 34 32 199 247 11 33 165 242 34 81 192 241 114 \
  661.  242 249 16 242 245] \
  662.     #(  ) ) >
  663.  
  664. <primitive 112 temp 2        " rem: " \
  665.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 29 248 4 242 \
  666.  32 10 35 243 245] \
  667.     #(  ) ) >
  668.  
  669. <primitive 112 temp 3        " radix: " \
  670.     #( #[ 32 33 250 2 26 243 245] \
  671.     #(  ) ) >
  672.  
  673. <primitive 112 temp 4        " quo: " \
  674.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 28 248 4 242 \
  675.  32 10 35 243 245] \
  676.     #(  ) ) >
  677.  
  678. <primitive 112 temp 5        " odd " \
  679.     #( #[ 32 82 205 80 202 243 245] \
  680.     #(  ) ) >
  681.  
  682. <primitive 112 temp 6        " noMask: " \
  683.     #( #[ 80 32 33 197 201 243 245] \
  684.     #(  ) ) >
  685.  
  686. <primitive 112 temp 7        " lcm: " \
  687.     #( #[ 32 33 250 2 6 247 10 32 33 194 32 33 11 27 206 \
  688.  248 4 242 32 10 35 243 245] \
  689.     #(  ) ) >
  690.  
  691. <primitive 112 temp 8        " highBit " \
  692.     #( #[ 32 250 1 34 243 245] \
  693.     #(  ) ) >
  694.  
  695. <primitive 112 temp 9        " gcd: " \
  696.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 20 248 4 242 \
  697.  32 10 35 243 245] \
  698.     #(  ) ) >
  699.  
  700. <primitive 112 temp 10        " factorial " \
  701.     #( #[ 32 250 1 38 243 245] \
  702.     #(  ) ) >
  703.  
  704. <primitive 112 temp 11        " even " \
  705.     #( #[ 32 82 205 80 201 243 245] \
  706.     #(  ) ) >
  707.  
  708. <primitive 112 temp 12        " bitXor: " \
  709.     #( #[ 32 33 250 2 24 243 245] \
  710.     #(  ) ) >
  711.  
  712. <primitive 112 temp 13        " bitShift: " \
  713.     #( #[ 32 33 250 2 25 243 245] \
  714.     #(  ) ) >
  715.  
  716. <primitive 112 temp 14        " bitOr: " \
  717.     #( #[ 32 33 250 2 22 243 245] \
  718.     #(  ) ) >
  719.  
  720. <primitive 112 temp 15        " bitInvert " \
  721.     #( #[ 32 250 1 33 243 245] \
  722.     #(  ) ) >
  723.  
  724. <primitive 112 temp 16        " bitAt: " \
  725.     #( #[ 32 33 250 2 21 243 245] \
  726.     #(  ) ) >
  727.  
  728. <primitive 112 temp 17        " bitAnd: " \
  729.     #( #[ 32 33 250 2 23 243 245] \
  730.     #(  ) ) >
  731.  
  732. <primitive 112 temp 18        " asString " \
  733.     #( #[ 32 250 1 37 243 245] \
  734.     #(  ) ) >
  735.  
  736. <primitive 112 temp 19        " asInteger " \
  737.     #( #[ 32 243 245] \
  738.     #(  ) ) >
  739.  
  740. <primitive 112 temp 20        " asFloat " \
  741.     #( #[ 32 250 1 39 243 245] \
  742.     #(  ) ) >
  743.  
  744. <primitive 112 temp 21        " asCharacter " \
  745.     #( #[ 32 250 1 36 243 245] \
  746.     #(  ) ) >
  747.  
  748. <primitive 112 temp 22        " anyMask: " \
  749.     #( #[ 80 32 33 250 2 23 202 243 245] \
  750.     #(  ) ) >
  751.  
  752. <primitive 112 temp 23        " allMask: " \
  753.     #( #[ 33 32 33 250 2 23 201 243 245] \
  754.     #(  ) ) >
  755.  
  756. <primitive 112 temp 24        " \\ " \
  757.     #( #[ 32 33 250 2 6 247 18 32 32 80 199 247 3 90 248 \
  758.  2 242 81 194 114 34 33 205 248 4 242 32 10 35 243 \
  759.  245] \
  760.     #(  ) ) >
  761.  
  762. <primitive 112 temp 25        " // " \
  763.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 19 248 4 242 \
  764.  32 10 35 243 245] \
  765.     #(  ) ) >
  766.  
  767. <primitive 112 temp 26        " / " \
  768.     #( #[ 32 175 33 190 243 245] \
  769.     #(  ) ) >
  770.  
  771. <primitive 112 temp 27        " * " \
  772.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 18 248 5 242 \
  773.  32 33 145 0 243 245] \
  774.     #( #*  ) ) >
  775.  
  776. <primitive 112 temp 28        " - " \
  777.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 11 248 5 242 \
  778.  32 33 145 0 243 245] \
  779.     #( #-  ) ) >
  780.  
  781. <primitive 112 temp 29        " + " \
  782.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 10 248 5 242 \
  783.  32 33 145 0 243 245] \
  784.     #( #+  ) ) >
  785.  
  786. <primitive 112 temp 30        " < " \
  787.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 12 248 5 242 \
  788.  32 33 145 0 243 245] \
  789.     #( #<  ) ) >
  790.  
  791. <primitive 112 temp 31        " > " \
  792.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 13 248 5 242 \
  793.  32 33 145 0 243 245] \
  794.     #( #>  ) ) >
  795.  
  796. <primitive 112 temp 32        " = " \
  797.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 16 248 5 242 \
  798.  32 33 145 0 243 245] \
  799.     #( #=  ) ) >
  800.  
  801. <primitive 98 #Integer \
  802.     <primitive 97 #Integer #Number #\smalltlk\prelude\integer.st \
  803.     #(  ) \
  804.     #( #timesRepeat: #rem: #radix: #quo: #odd #noMask: #lcm: #highBit #gcd: #factorial #even #bitXor: #bitShift: #bitOr: #bitInvert #bitAt: #bitAnd: #asString #asInteger #asFloat #asCharacter #anyMask: #allMask: #\\ #// #/ #* #- #+ #< #> #=  ) \
  805.     temp 3 5 > >
  806.  
  807. temp <- <primitive 110 18 >
  808. <primitive 112 temp 1        " printString " \
  809.     #( #[ 48 32 250 1 58 11 17 243 245] \
  810.     #( '$'  ) ) >
  811.  
  812. <primitive 112 temp 2        " isVowel " \
  813.     #( #[ 32 250 1 51 243 245] \
  814.     #(  ) ) >
  815.  
  816. <primitive 112 temp 3        " isUppercase " \
  817.     #( #[ 32 48 49 218 243 245] \
  818.     #( $A $Z  ) ) >
  819.  
  820. <primitive 112 temp 4        " isSeparator " \
  821.     #( #[ 32 250 1 55 243 245] \
  822.     #(  ) ) >
  823.  
  824. <primitive 112 temp 5        " isLowercase " \
  825.     #( #[ 32 48 49 218 243 245] \
  826.     #( $a $z  ) ) >
  827.  
  828. <primitive 112 temp 6        " isLetter " \
  829.     #( #[ 32 10 28 251 3 32 10 29 243 245] \
  830.     #(  ) ) >
  831.  
  832. <primitive 112 temp 7        " isDigit " \
  833.     #( #[ 32 48 49 218 243 245] \
  834.     #( $0 $9  ) ) >
  835.  
  836. <primitive 112 temp 8        " isAlphaNumeric " \
  837.     #( #[ 32 250 1 56 243 245] \
  838.     #(  ) ) >
  839.  
  840. <primitive 112 temp 9        " digitValue " \
  841.     #( #[ 32 250 1 50 241 113 161 247 3 32 48 188 242 33 243 \
  842.  245] \
  843.     #( 'digitValue on nondigit char'  ) ) >
  844.  
  845. <primitive 112 temp 10        " compareError " \
  846.     #( #[ 32 48 188 243 245] \
  847.     #( 'char cannot be compared to non char'  ) ) >
  848.  
  849. <primitive 112 temp 11        " asString " \
  850.     #( #[ 32 250 1 58 243 245] \
  851.     #(  ) ) >
  852.  
  853. <primitive 112 temp 12        " asUppercase " \
  854.     #( #[ 32 250 1 53 247 6 32 250 1 57 248 2 242 32 243 \
  855.  245] \
  856.     #(  ) ) >
  857.  
  858. <primitive 112 temp 13        " asLowercase " \
  859.     #( #[ 32 250 1 54 247 6 32 250 1 57 248 2 242 32 243 \
  860.  245] \
  861.     #(  ) ) >
  862.  
  863. <primitive 112 temp 14        " asciiValue " \
  864.     #( #[ 32 250 1 59 243 245] \
  865.     #(  ) ) >
  866.  
  867. <primitive 112 temp 15        " > " \
  868.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 43 248 4 242 \
  869.  32 10 19 243 245] \
  870.     #(  ) ) >
  871.  
  872. <primitive 112 temp 16        " = " \
  873.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 46 248 4 242 \
  874.  32 10 19 243 245] \
  875.     #(  ) ) >
  876.  
  877. <primitive 112 temp 17        " < " \
  878.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 42 248 4 242 \
  879.  32 10 19 243 245] \
  880.     #(  ) ) >
  881.  
  882. <primitive 112 temp 18        " == " \
  883.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 46 248 2 242 \
  884.  92 243 245] \
  885.     #(  ) ) >
  886.  
  887. <primitive 98 #Char \
  888.     <primitive 97 #Char #Magnitude #\smalltlk\prelude\char.st \
  889.     #(  ) \
  890.     #( #printString #isVowel #isUppercase #isSeparator #isLowercase #isLetter #isDigit #isAlphaNumeric #digitValue #compareError #asString #asUppercase #asLowercase #asciiValue #> #= #< #==  ) \
  891.     temp 2 4 > >
  892.  
  893. temp <- <primitive 110 25 >
  894. <primitive 112 temp 1        " truncated " \
  895.     #( #[ 32 48 199 247 6 32 250 1 73 248 5 242 32 250 1 \
  896.  72 243 245] \
  897.     #( 0.0  ) ) >
  898.  
  899. <primitive 112 temp 2        " sqrt " \
  900.     #( #[ 32 250 1 71 243 245] \
  901.     #(  ) ) >
  902.  
  903. <primitive 112 temp 3        " rounded " \
  904.     #( #[ 32 48 192 250 1 72 243 245] \
  905.     #( 0.5  ) ) >
  906.  
  907. <primitive 112 temp 4        " radix: " \
  908.     #( #[ 32 33 250 2 89 243 245] \
  909.     #(  ) ) >
  910.  
  911. <primitive 112 temp 5        " ln " \
  912.     #( #[ 32 250 1 70 243 245] \
  913.     #(  ) ) >
  914.  
  915. <primitive 112 temp 6        " integerPart " \
  916.     #( #[ 32 250 1 75 243 245] \
  917.     #(  ) ) >
  918.  
  919. <primitive 112 temp 7        " gamma " \
  920.     #( #[ 32 250 1 77 243 245] \
  921.     #(  ) ) >
  922.  
  923. <primitive 112 temp 8        " fractionPart " \
  924.     #( #[ 32 250 1 76 243 245] \
  925.     #(  ) ) >
  926.  
  927. <primitive 112 temp 9        " floor " \
  928.     #( #[ 32 250 1 72 243 245] \
  929.     #(  ) ) >
  930.  
  931. <primitive 112 temp 10        " exp " \
  932.     #( #[ 32 250 1 79 243 245] \
  933.     #(  ) ) >
  934.  
  935. <primitive 112 temp 11        " coerce: " \
  936.     #( #[ 33 175 243 245] \
  937.     #(  ) ) >
  938.  
  939. <primitive 112 temp 12        " ceiling " \
  940.     #( #[ 32 250 1 73 243 245] \
  941.     #(  ) ) >
  942.  
  943. <primitive 112 temp 13        " asString " \
  944.     #( #[ 32 250 1 78 243 245] \
  945.     #(  ) ) >
  946.  
  947. <primitive 112 temp 14        " asFloat " \
  948.     #( #[ 32 243 245] \
  949.     #(  ) ) >
  950.  
  951. <primitive 112 temp 15        " arcTan " \
  952.     #( #[ 5 54 32 250 1 86 176 243 245] \
  953.     #(  ) ) >
  954.  
  955. <primitive 112 temp 16        " arcSin " \
  956.     #( #[ 5 54 32 250 1 84 176 243 245] \
  957.     #(  ) ) >
  958.  
  959. <primitive 112 temp 17        " arcCos " \
  960.     #( #[ 5 54 32 250 1 85 176 243 245] \
  961.     #(  ) ) >
  962.  
  963. <primitive 112 temp 18        " ^ " \
  964.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 88 248 5 242 \
  965.  32 33 145 0 243 245] \
  966.     #( #raisedTo:  ) ) >
  967.  
  968. <primitive 112 temp 19        " / " \
  969.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 69 248 5 242 \
  970.  32 33 145 0 243 245] \
  971.     #( #/  ) ) >
  972.  
  973. <primitive 112 temp 20        " * " \
  974.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 68 248 5 242 \
  975.  32 33 145 0 243 245] \
  976.     #( #*  ) ) >
  977.  
  978. <primitive 112 temp 21        " - " \
  979.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 61 248 5 242 \
  980.  32 33 145 0 243 245] \
  981.     #( #-  ) ) >
  982.  
  983. <primitive 112 temp 22        " + " \
  984.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 60 248 5 242 \
  985.  32 33 145 0 243 245] \
  986.     #( #+  ) ) >
  987.  
  988. <primitive 112 temp 23        " > " \
  989.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 63 248 5 242 \
  990.  32 33 145 0 243 245] \
  991.     #( #>  ) ) >
  992.  
  993. <primitive 112 temp 24        " < " \
  994.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 62 248 5 242 \
  995.  32 33 145 0 243 245] \
  996.     #( #<  ) ) >
  997.  
  998. <primitive 112 temp 25        " = " \
  999.     #( #[ 32 33 250 2 6 247 7 32 33 250 2 66 248 5 242 \
  1000.  32 33 145 0 243 245] \
  1001.     #( #=  ) ) >
  1002.  
  1003. <primitive 98 #Float \
  1004.     <primitive 97 #Float #Number #\smalltlk\prelude\float.st \
  1005.     #(  ) \
  1006.     #( #truncated #sqrt #rounded #radix: #ln #integerPart #gamma #fractionPart #floor #exp #coerce: #ceiling #asString #asFloat #arcTan #arcSin #arcCos #^ #/ #* #- #+ #> #< #=  ) \
  1007.     temp 2 4 > >
  1008.  
  1009. temp <- <primitive 110 8 >
  1010. <primitive 112 temp 1        " printString " \
  1011.     #( #[ 16 10 16 48 11 17 243 245] \
  1012.     #( ' radians'  ) ) >
  1013.  
  1014. <primitive 112 temp 2        " asFloat " \
  1015.     #( #[ 16 243 245] \
  1016.     #(  ) ) >
  1017.  
  1018. <primitive 112 temp 3        " tan " \
  1019.     #( #[ 16 250 1 81 16 250 1 82 190 243 245] \
  1020.     #(  ) ) >
  1021.  
  1022. <primitive 112 temp 4        " cos " \
  1023.     #( #[ 16 250 1 82 243 245] \
  1024.     #(  ) ) >
  1025.  
  1026. <primitive 112 temp 5        " sin " \
  1027.     #( #[ 16 250 1 81 243 245] \
  1028.     #(  ) ) >
  1029.  
  1030. <primitive 112 temp 6        " = " \
  1031.     #( #[ 16 33 175 201 243 245] \
  1032.     #(  ) ) >
  1033.  
  1034. <primitive 112 temp 7        " < " \
  1035.     #( #[ 16 33 175 199 243 245] \
  1036.     #(  ) ) >
  1037.  
  1038. <primitive 112 temp 8        " new: " \
  1039.     #( #[ 33 175 250 1 80 96 245] \
  1040.     #(  ) ) >
  1041.  
  1042. <primitive 98 #Radian \
  1043.     <primitive 97 #Radian #Magnitude #\smalltlk\prelude\radian.st \
  1044.     #(  #value ) \
  1045.     #( #printString #asFloat #tan #cos #sin #= #< #new:  ) \
  1046.     temp 2 3 > >
  1047.  
  1048. temp <- <primitive 110 21 >
  1049. <primitive 112 temp 1        " y: " \
  1050.     #( #[ 33 97 245] \
  1051.     #(  ) ) >
  1052.  
  1053. <primitive 112 temp 2        " y " \
  1054.     #( #[ 17 243 245] \
  1055.     #(  ) ) >
  1056.  
  1057. <primitive 112 temp 3        " x:y: " \
  1058.     #( #[ 33 96 34 97 245] \
  1059.     #(  ) ) >
  1060.  
  1061. <primitive 112 temp 4        " x: " \
  1062.     #( #[ 33 96 245] \
  1063.     #(  ) ) >
  1064.  
  1065. <primitive 112 temp 5        " x " \
  1066.     #( #[ 16 243 245] \
  1067.     #(  ) ) >
  1068.  
  1069. <primitive 112 temp 6        " transpose " \
  1070.     #( #[ 5 53 160 17 11 50 16 11 51 243 245] \
  1071.     #(  ) ) >
  1072.  
  1073. <primitive 112 temp 7        " printString " \
  1074.     #( #[ 16 169 48 11 17 17 169 11 17 243 245] \
  1075.     #( ' @ '  ) ) >
  1076.  
  1077. <primitive 112 temp 8        " min: " \
  1078.     #( #[ 5 53 160 16 33 10 49 207 11 50 17 33 10 50 207 \
  1079.  11 51 243 245] \
  1080.     #(  ) ) >
  1081.  
  1082. <primitive 112 temp 9        " max: " \
  1083.     #( #[ 5 53 160 16 33 10 49 12 16 11 50 17 33 10 50 \
  1084.  12 16 11 51 243 245] \
  1085.     #(  ) ) >
  1086.  
  1087. <primitive 112 temp 10        " dist: " \
  1088.     #( #[ 16 33 10 49 193 10 44 17 33 10 50 193 10 44 192 \
  1089.  10 43 243 245] \
  1090.     #(  ) ) >
  1091.  
  1092. <primitive 112 temp 11        " asString " \
  1093.     #( #[ 16 10 16 48 11 17 17 10 16 11 17 243 245] \
  1094.     #( ' @ '  ) ) >
  1095.  
  1096. <primitive 112 temp 12        " abs " \
  1097.     #( #[ 5 53 160 16 173 11 50 17 173 11 51 243 245] \
  1098.     #(  ) ) >
  1099.  
  1100. <primitive 112 temp 13        " // " \
  1101.     #( #[ 5 53 160 16 33 11 18 11 50 17 33 11 18 11 51 \
  1102.  243 245] \
  1103.     #(  ) ) >
  1104.  
  1105. <primitive 112 temp 14        " / " \
  1106.     #( #[ 5 53 160 16 33 190 11 50 17 33 190 11 51 243 245 \
  1107. ] \
  1108.     #(  ) ) >
  1109.  
  1110. <primitive 112 temp 15        " - " \
  1111.     #( #[ 5 53 160 16 33 10 49 193 11 50 17 33 10 50 193 \
  1112.  11 51 243 245] \
  1113.     #(  ) ) >
  1114.  
  1115. <primitive 112 temp 16        " + " \
  1116.     #( #[ 5 53 160 16 33 10 49 192 11 50 17 33 10 50 192 \
  1117.  11 51 243 245] \
  1118.     #(  ) ) >
  1119.  
  1120. <primitive 112 temp 17        " * " \
  1121.     #( #[ 5 53 160 16 33 194 11 50 17 33 194 11 51 243 245 \
  1122. ] \
  1123.     #(  ) ) >
  1124.  
  1125. <primitive 112 temp 18        " = " \
  1126.     #( #[ 16 33 10 49 201 252 5 17 33 10 50 201 243 245] \
  1127.     #(  ) ) >
  1128.  
  1129. <primitive 112 temp 19        " >= " \
  1130.     #( #[ 16 33 10 49 203 252 5 17 33 10 50 203 243 245] \
  1131.     #(  ) ) >
  1132.  
  1133. <primitive 112 temp 20        " <= " \
  1134.     #( #[ 16 33 10 49 200 252 5 17 33 10 50 199 243 245] \
  1135.     #(  ) ) >
  1136.  
  1137. <primitive 112 temp 21        " < " \
  1138.     #( #[ 16 33 10 49 199 252 5 17 33 10 50 199 243 245] \
  1139.     #(  ) ) >
  1140.  
  1141. <primitive 98 #Point \
  1142.     <primitive 97 #Point #Magnitude #\smalltlk\prelude\point.st \
  1143.     #(  #xvalue #yvalue ) \
  1144.     #( #y: #y #x:y: #x: #x #transpose #printString #min: #max: #dist: #asString #abs #// #/ #- #+ #* #= #>= #<= #<  ) \
  1145.     temp 3 4 > >
  1146.  
  1147. temp <- <primitive 110 7 >
  1148. <primitive 112 temp 1        " next: " \
  1149.     #( #[ 5 30 33 176 114 81 33 178 225 3 6 34 35 32 167 \
  1150.  208 243 179 242 34 243 245] \
  1151.     #(  ) ) >
  1152.  
  1153. <primitive 112 temp 2        " randInteger: " \
  1154.     #( #[ 32 167 33 194 10 47 81 192 243 245] \
  1155.     #(  ) ) >
  1156.  
  1157. <primitive 112 temp 3        " between:and: " \
  1158.     #( #[ 32 167 34 33 193 194 33 192 243 245] \
  1159.     #(  ) ) >
  1160.  
  1161. <primitive 112 temp 4        " next " \
  1162.     #( #[ 16 250 1 35 241 96 250 1 32 243 245] \
  1163.     #(  ) ) >
  1164.  
  1165. <primitive 112 temp 5        " first " \
  1166.     #( #[ 16 250 1 35 241 96 250 1 32 243 245] \
  1167.     #(  ) ) >
  1168.  
  1169. <primitive 112 temp 6        " randomize " \
  1170.     #( #[ 250 0 161 96 245] \
  1171.     #(  ) ) >
  1172.  
  1173. <primitive 112 temp 7        " new " \
  1174.     #( #[ 81 96 245] \
  1175.     #(  ) ) >
  1176.  
  1177. <primitive 98 #Random \
  1178.     <primitive 97 #Random #Object #\smalltlk\prelude\random.st \
  1179.     #(  #seed ) \
  1180.     #( #next: #randInteger: #between:and: #next #first #randomize #new  ) \
  1181.     temp 4 6 > >
  1182.  
  1183. temp <- <primitive 110 23 >
  1184. <primitive 112 temp 1        " size " \
  1185.     #( #[ 80 113 32 225 2 6 33 81 192 241 113 243 179 242 33 \
  1186.  243 245] \
  1187.     #(  ) ) >
  1188.  
  1189. <primitive 112 temp 2        " shallowCopy " \
  1190.     #( #[ 5 48 160 113 32 225 2 5 33 34 11 22 243 179 242 \
  1191.  32 33 191 243 245] \
  1192.     #(  ) ) >
  1193.  
  1194. <primitive 112 temp 3        " select: " \
  1195.     #( #[ 32 32 164 160 226 2 11 33 35 180 247 3 34 35 189 \
  1196.  242 34 243 215 243 245] \
  1197.     #(  ) ) >
  1198.  
  1199. <primitive 112 temp 4        " remove:ifAbsent: " \
  1200.     #( #[ 32 33 11 30 247 6 32 33 11 39 248 3 242 34 165 \
  1201.  243 245] \
  1202.     #(  ) ) >
  1203.  
  1204. <primitive 112 temp 5        " remove: " \
  1205.     #( #[ 32 33 224 4 32 48 188 244 216 242 33 243 245] \
  1206.     #( 'attempt to remove object not found in collection'  ) ) >
  1207.  
  1208. <primitive 112 temp 6        " reject: " \
  1209.     #( #[ 32 225 2 5 33 34 180 172 243 11 44 243 245] \
  1210.     #(  ) ) >
  1211.  
  1212. <primitive 112 temp 7        " printString " \
  1213.     #( #[ 32 32 164 169 48 11 17 226 1 9 33 49 11 17 34 \
  1214.  169 11 17 243 215 50 11 17 243 245] \
  1215.     #( ' (' ' ' ' )'  ) ) >
  1216.  
  1217. <primitive 112 temp 8        " occurrencesOf: " \
  1218.     #( #[ 32 80 226 2 13 35 33 201 247 5 34 81 192 248 2 \
  1219.  242 34 243 215 243 245] \
  1220.     #(  ) ) >
  1221.  
  1222. <primitive 112 temp 9        " isEmpty " \
  1223.     #( #[ 32 163 80 201 243 245] \
  1224.     #(  ) ) >
  1225.  
  1226. <primitive 112 temp 10        " inject:into: " \
  1227.     #( #[ 33 115 32 225 4 7 34 35 36 211 241 115 243 179 242 \
  1228.  35 243 245] \
  1229.     #(  ) ) >
  1230.  
  1231. <primitive 112 temp 11        " includes: " \
  1232.     #( #[ 32 225 2 8 34 33 181 247 2 91 244 243 179 242 92 \
  1233.  243 245] \
  1234.     #(  ) ) >
  1235.  
  1236. <primitive 112 temp 12        " first " \
  1237.     #( #[ 32 48 188 243 245] \
  1238.     #( 'subclass should implement first'  ) ) >
  1239.  
  1240. <primitive 112 temp 13        " detect:ifAbsent: " \
  1241.     #( #[ 32 225 3 8 33 35 180 247 2 35 244 243 179 242 34 \
  1242.  165 243 245] \
  1243.     #(  ) ) >
  1244.  
  1245. <primitive 112 temp 14        " detect: " \
  1246.     #( #[ 32 33 224 4 32 48 188 243 223 243 245] \
  1247.     #( 'no object found matching detect'  ) ) >
  1248.  
  1249. <primitive 112 temp 15        " deepCopy " \
  1250.     #( #[ 5 48 160 113 32 225 2 7 33 34 10 20 11 22 243 \
  1251.  179 242 32 33 191 243 245] \
  1252.     #(  ) ) >
  1253.  
  1254. <primitive 112 temp 16        " collect: " \
  1255.     #( #[ 32 32 164 160 226 2 8 34 33 35 180 189 242 34 243 \
  1256.  215 243 245] \
  1257.     #(  ) ) >
  1258.  
  1259. <primitive 112 temp 17        " coerce: " \
  1260.     #( #[ 32 164 160 114 33 225 3 4 34 35 189 243 179 242 34 \
  1261.  243 245] \
  1262.     #(  ) ) >
  1263.  
  1264. <primitive 112 temp 18        " asString " \
  1265.     #( #[ 5 58 32 163 176 241 81 32 163 32 131 0 242 243 245 \
  1266. ] \
  1267.     #( #replaceFrom:to:with:  ) ) >
  1268.  
  1269. <primitive 112 temp 19        " asList " \
  1270.     #( #[ 5 48 160 32 11 20 243 245] \
  1271.     #(  ) ) >
  1272.  
  1273. <primitive 112 temp 20        " asSet " \
  1274.     #( #[ 5 57 160 32 11 19 243 245] \
  1275.     #(  ) ) >
  1276.  
  1277. <primitive 112 temp 21        " asBag " \
  1278.     #( #[ 5 32 160 32 11 19 243 245] \
  1279.     #(  ) ) >
  1280.  
  1281. <primitive 112 temp 22        " asArray " \
  1282.     #( #[ 5 30 32 163 176 241 81 32 163 32 131 0 242 243 245 \
  1283. ] \
  1284.     #( #replaceFrom:to:with:  ) ) >
  1285.  
  1286. <primitive 112 temp 23        " addAll: " \
  1287.     #( #[ 33 225 2 4 32 34 189 243 179 242 245] \
  1288.     #(  ) ) >
  1289.  
  1290. <primitive 98 #Collection \
  1291.     <primitive 97 #Collection #Object #\smalltlk\prelude\collecti.st \
  1292.     #(  ) \
  1293.     #( #size #shallowCopy #select: #remove:ifAbsent: #remove: #reject: #printString #occurrencesOf: #isEmpty #inject:into: #includes: #first #detect:ifAbsent: #detect: #deepCopy #collect: #coerce: #asString #asList #asSet #asBag #asArray #addAll:  ) \
  1294.     temp 5 7 > >
  1295.  
  1296. temp <- <primitive 110 8 >
  1297. <primitive 112 temp 1        " next " \
  1298.     #( #[ 17 162 247 27 17 80 204 247 9 17 81 193 97 16 171 \
  1299.  243 248 10 242 16 167 241 97 161 247 2 93 243 242 249 \
  1300.  31 242 93 243 245] \
  1301.     #(  ) ) >
  1302.  
  1303. <primitive 112 temp 2        " first " \
  1304.     #( #[ 16 166 241 97 161 247 2 93 243 242 17 81 193 97 16 \
  1305.  171 243 245] \
  1306.     #(  ) ) >
  1307.  
  1308. <primitive 112 temp 3        " occurrencesOf: " \
  1309.     #( #[ 16 33 224 2 80 243 213 243 245] \
  1310.     #(  ) ) >
  1311.  
  1312. <primitive 112 temp 4        " size " \
  1313.     #( #[ 16 80 226 1 4 33 34 192 243 215 243 245] \
  1314.     #(  ) ) >
  1315.  
  1316. <primitive 112 temp 5        " remove:ifAbsent: " \
  1317.     #( #[ 16 33 224 3 34 165 244 213 115 81 35 201 247 6 16 \
  1318.  33 11 40 248 7 242 16 33 35 81 193 208 242 245] \
  1319.     #(  ) ) >
  1320.  
  1321. <primitive 112 temp 6        " add:withOccurrences: " \
  1322.     #( #[ 34 224 4 32 33 189 243 183 242 33 243 245] \
  1323.     #(  ) ) >
  1324.  
  1325. <primitive 112 temp 7        " add: " \
  1326.     #( #[ 16 33 81 16 33 224 2 80 243 213 192 208 242 245] \
  1327.     #(  ) ) >
  1328.  
  1329. <primitive 112 temp 8        " new " \
  1330.     #( #[ 5 40 160 96 245] \
  1331.     #(  ) ) >
  1332.  
  1333. <primitive 98 #Bag \
  1334.     <primitive 97 #Bag #Collection #\smalltlk\prelude\bag.st \
  1335.     #(  #dict #count ) \
  1336.     #( #next #first #occurrencesOf: #size #remove:ifAbsent: #add:withOccurrences: #add: #new  ) \
  1337.     temp 4 8 > >
  1338.  
  1339. temp <- <primitive 110 7 >
  1340. <primitive 112 temp 1        " next " \
  1341.     #( #[ 16 167 243 245] \
  1342.     #(  ) ) >
  1343.  
  1344. <primitive 112 temp 2        " first " \
  1345.     #( #[ 16 166 243 245] \
  1346.     #(  ) ) >
  1347.  
  1348. <primitive 112 temp 3        " occurrencesOf: " \
  1349.     #( #[ 16 33 11 30 247 3 81 248 2 242 80 243 245] \
  1350.     #(  ) ) >
  1351.  
  1352. <primitive 112 temp 4        " size " \
  1353.     #( #[ 16 163 243 245] \
  1354.     #(  ) ) >
  1355.  
  1356. <primitive 112 temp 5        " remove:ifAbsent: " \
  1357.     #( #[ 16 33 34 216 242 245] \
  1358.     #(  ) ) >
  1359.  
  1360. <primitive 112 temp 6        " add: " \
  1361.     #( #[ 16 33 11 30 246 3 16 33 189 242 245] \
  1362.     #(  ) ) >
  1363.  
  1364. <primitive 112 temp 7        " new " \
  1365.     #( #[ 5 48 160 96 245] \
  1366.     #(  ) ) >
  1367.  
  1368. <primitive 98 #Set \
  1369.     <primitive 97 #Set #Collection #\smalltlk\prelude\set.st \
  1370.     #(  #list ) \
  1371.     #( #next #first #occurrencesOf: #size #remove:ifAbsent: #add: #new  ) \
  1372.     temp 3 4 > >
  1373.  
  1374. temp <- <primitive 110 19 >
  1375. <primitive 112 temp 1        " values " \
  1376.     #( #[ 5 32 160 113 32 225 2 4 33 34 189 243 179 242 33 \
  1377.  243 245] \
  1378.     #(  ) ) >
  1379.  
  1380. <primitive 112 temp 2        " select: " \
  1381.     #( #[ 32 32 5 40 160 226 2 13 33 35 180 247 5 34 32 \
  1382.  171 35 208 242 34 243 215 191 243 245] \
  1383.     #(  ) ) >
  1384.  
  1385. <primitive 112 temp 3        " removeKey:ifAbsent: " \
  1386.     #( #[ 32 48 188 243 245] \
  1387.     #( 'subclass should implement RemoveKey:ifAbsent:'  ) ) >
  1388.  
  1389. <primitive 112 temp 4        " removeKey: " \
  1390.     #( #[ 32 33 224 6 32 48 188 242 33 244 217 243 245] \
  1391.     #( 'no element associated with key'  ) ) >
  1392.  
  1393. <primitive 112 temp 5        " remove: " \
  1394.     #( #[ 32 48 188 243 245] \
  1395.     #( 'object must be removed with explicit key'  ) ) >
  1396.  
  1397. <primitive 112 temp 6        " keysSelect: " \
  1398.     #( #[ 32 32 5 40 160 226 2 14 33 35 171 180 247 5 34 \
  1399.  32 171 35 208 242 34 243 215 191 243 245] \
  1400.     #(  ) ) >
  1401.  
  1402. <primitive 112 temp 7        " keysDo: " \
  1403.     #( #[ 32 225 2 5 33 32 171 180 243 179 243 245] \
  1404.     #(  ) ) >
  1405.  
  1406. <primitive 112 temp 8        " keys " \
  1407.     #( #[ 5 57 160 113 32 225 2 4 33 34 189 243 11 32 242 \
  1408.  33 243 245] \
  1409.     #(  ) ) >
  1410.  
  1411. <primitive 112 temp 9        " indexOf:ifAbsent: " \
  1412.     #( #[ 32 225 3 9 35 33 201 247 3 32 171 244 243 179 242 \
  1413.  34 165 243 245] \
  1414.     #(  ) ) >
  1415.  
  1416. <primitive 112 temp 10        " indexOf: " \
  1417.     #( #[ 32 33 224 4 32 48 188 243 214 243 245] \
  1418.     #( 'indexOf element not found'  ) ) >
  1419.  
  1420. <primitive 112 temp 11        " includesKey: " \
  1421.     #( #[ 32 33 224 2 92 244 213 242 91 243 245] \
  1422.     #(  ) ) >
  1423.  
  1424. <primitive 112 temp 12        " collect: " \
  1425.     #( #[ 32 32 5 40 160 226 2 10 34 32 171 33 35 180 208 \
  1426.  242 34 243 215 191 243 245] \
  1427.     #(  ) ) >
  1428.  
  1429. <primitive 112 temp 13        " coerce: " \
  1430.     #( #[ 32 164 160 114 33 226 3 5 34 35 36 208 243 11 23 \
  1431.  242 34 243 245] \
  1432.     #(  ) ) >
  1433.  
  1434. <primitive 112 temp 14        " binaryDo: " \
  1435.     #( #[ 32 225 3 6 33 32 171 35 211 243 179 242 93 243 245 \
  1436. ] \
  1437.     #(  ) ) >
  1438.  
  1439. <primitive 112 temp 15        " atAll:put: " \
  1440.     #( #[ 33 225 3 5 32 35 34 208 243 179 242 245] \
  1441.     #(  ) ) >
  1442.  
  1443. <primitive 112 temp 16        " at: " \
  1444.     #( #[ 32 33 224 10 32 33 169 48 11 17 188 242 33 244 213 \
  1445.  243 245] \
  1446.     #( ': association not found'  ) ) >
  1447.  
  1448. <primitive 112 temp 17        " asDictionary " \
  1449.     #( #[ 5 40 160 113 32 226 2 5 33 34 35 208 243 11 23 \
  1450.  242 33 243 245] \
  1451.     #(  ) ) >
  1452.  
  1453. <primitive 112 temp 18        " addAll: " \
  1454.     #( #[ 33 226 2 5 32 34 35 208 243 11 23 242 33 243 245 \
  1455. ] \
  1456.     #(  ) ) >
  1457.  
  1458. <primitive 112 temp 19        " add: " \
  1459.     #( #[ 32 48 188 243 245] \
  1460.     #( 'Must add with explicit key'  ) ) >
  1461.  
  1462. <primitive 98 #KeyedCollection \
  1463.     <primitive 97 #KeyedCollection #Collection #\smalltlk\prelude\kcollect.st \
  1464.     #(  ) \
  1465.     #( #values #select: #removeKey:ifAbsent: #removeKey: #remove: #keysSelect: #keysDo: #keys #indexOf:ifAbsent: #indexOf: #includesKey: #collect: #coerce: #binaryDo: #atAll:put: #at: #asDictionary #addAll: #add:  ) \
  1466.     temp 5 9 > >
  1467.  
  1468. temp <- <primitive 110 12 >
  1469. <primitive 112 temp 1        " checkBucket: " \
  1470.     #( #[ 16 33 241 97 177 241 98 161 247 2 93 243 242 18 166 \
  1471.  243 245] \
  1472.     #(  ) ) >
  1473.  
  1474. <primitive 112 temp 2        " currentKey " \
  1475.     #( #[ 18 162 247 11 18 10 21 113 33 162 247 3 33 10 49 \
  1476.  243 245] \
  1477.     #(  ) ) >
  1478.  
  1479. <primitive 112 temp 3        " printString " \
  1480.     #( #[ 32 32 164 169 48 11 17 226 1 17 33 32 171 169 11 \
  1481.  17 49 11 17 34 169 11 17 50 11 17 243 215 51 11 \
  1482.  17 243 245] \
  1483.     #( ' ( ' ' @ ' ' ' ')'  ) ) >
  1484.  
  1485. <primitive 112 temp 4        " next " \
  1486.     #( #[ 18 167 241 113 162 247 4 33 10 50 243 242 17 5 17 \
  1487.  199 247 20 17 81 192 97 32 17 11 24 241 113 162 247 \
  1488.  4 33 10 50 243 242 249 26 242 93 243 245] \
  1489.     #(  ) ) >
  1490.  
  1491. <primitive 112 temp 5        " first " \
  1492.     #( #[ 81 5 17 178 225 2 14 32 34 11 24 241 113 162 247 \
  1493.  4 33 10 50 244 243 179 242 93 243 245] \
  1494.     #(  ) ) >
  1495.  
  1496. <primitive 112 temp 6        " findAssociation:inList: " \
  1497.     #( #[ 34 225 3 10 35 10 49 33 201 247 2 35 244 243 179 \
  1498.  242 93 243 245] \
  1499.     #(  ) ) >
  1500.  
  1501. <primitive 112 temp 7        " removeKey:ifAbsent: " \
  1502.     #( #[ 32 33 11 28 115 32 33 35 222 116 36 161 247 3 34 \
  1503.  165 243 242 35 36 224 3 34 165 244 216 10 50 243 245 \
  1504. ] \
  1505.     #(  ) ) >
  1506.  
  1507. <primitive 112 temp 8        " at:ifAbsent: " \
  1508.     #( #[ 32 33 11 28 115 32 33 35 222 116 36 161 247 3 34 \
  1509.  165 243 242 36 10 50 243 245] \
  1510.     #(  ) ) >
  1511.  
  1512. <primitive 112 temp 9        " at:put: " \
  1513.     #( #[ 32 33 11 28 115 32 33 35 222 116 36 161 247 15 5 \
  1514.  53 160 33 11 50 34 11 51 116 35 36 189 248 5 242 \
  1515.  36 34 11 51 242 34 243 245] \
  1516.     #(  ) ) >
  1517.  
  1518. <primitive 112 temp 10        " getList: " \
  1519.     #( #[ 32 33 11 29 115 16 35 177 114 34 161 247 8 5 48 \
  1520.  160 114 16 35 34 208 242 34 243 245] \
  1521.     #(  ) ) >
  1522.  
  1523. <primitive 112 temp 11        " hashNumber: " \
  1524.     #( #[ 33 250 1 5 16 163 195 81 192 243 245] \
  1525.     #(  ) ) >
  1526.  
  1527. <primitive 112 temp 12        " new " \
  1528.     #( #[ 5 30 5 17 176 96 245] \
  1529.     #(  ) ) >
  1530.  
  1531. <primitive 98 #Dictionary \
  1532.     <primitive 97 #Dictionary #KeyedCollection #\smalltlk\prelude\dictiona.st \
  1533.     #(  #hashTable #currentBucket #currentList ) \
  1534.     #( #checkBucket: #currentKey #printString #next #first #findAssociation:inList: #removeKey:ifAbsent: #at:ifAbsent: #at:put: #getList: #hashNumber: #new  ) \
  1535.     temp 5 6 > >
  1536.  
  1537. temp <- <primitive 110 21 >
  1538. <primitive 112 temp 1        " with:do: " \
  1539.     #( #[ 32 166 115 33 166 116 35 162 247 15 34 35 36 211 242 \
  1540.  32 167 115 33 167 241 116 242 249 19 242 93 243 245] \
  1541.     #(  ) ) >
  1542.  
  1543. <primitive 112 temp 2        " sort: " \
  1544.     #( #[ 32 174 116 82 36 163 178 225 5 51 37 81 193 114 34 \
  1545.  81 203 252 11 33 36 34 177 36 34 81 192 177 211 172 \
  1546.  247 28 36 34 177 115 36 34 36 34 81 192 177 208 242 \
  1547.  36 34 81 192 35 208 242 34 81 193 241 114 242 249 46 \
  1548.  243 179 242 32 36 191 243 245] \
  1549.     #(  ) ) >
  1550.  
  1551. <primitive 112 temp 3        " sort " \
  1552.     #( #[ 32 226 1 4 33 34 200 243 11 46 243 245] \
  1553.     #(  ) ) >
  1554.  
  1555. <primitive 112 temp 4        " select: " \
  1556.     #( #[ 32 32 5 48 160 226 2 12 33 35 180 247 4 34 35 \
  1557.  11 22 242 34 243 215 191 243 245] \
  1558.     #(  ) ) >
  1559.  
  1560. <primitive 112 temp 5        " reversed " \
  1561.     #( #[ 5 30 32 163 241 114 176 113 32 225 3 11 33 34 35 \
  1562.  208 242 34 81 193 241 114 243 179 242 32 33 191 243 245 \
  1563. ] \
  1564.     #(  ) ) >
  1565.  
  1566. <primitive 112 temp 6        " reverseDo: " \
  1567.     #( #[ 32 10 31 114 32 10 25 115 34 35 203 247 20 32 34 \
  1568.  11 52 247 5 33 32 34 177 180 242 34 81 193 241 114 \
  1569.  242 249 25 242 93 243 245] \
  1570.     #(  ) ) >
  1571.  
  1572. <primitive 112 temp 7        " replaceFrom:to:with:startingAt: " \
  1573.     #( #[ 80 117 33 37 192 34 200 247 19 32 33 37 192 35 37 \
  1574.  36 192 177 208 242 37 81 192 241 117 242 249 26 242 245 \
  1575. ] \
  1576.     #(  ) ) >
  1577.  
  1578. <primitive 112 temp 8        " replaceFrom:to:with: " \
  1579.     #( #[ 35 33 226 4 9 32 36 37 208 242 36 81 192 243 215 \
  1580.  242 245] \
  1581.     #(  ) ) >
  1582.  
  1583. <primitive 112 temp 9        " last " \
  1584.     #( #[ 80 32 163 201 246 5 32 32 10 31 177 243 245] \
  1585.     #(  ) ) >
  1586.  
  1587. <primitive 112 temp 10        " indexOfSubCollection:startingAt: " \
  1588.     #( #[ 32 33 34 224 6 32 48 188 242 93 243 131 1 243 245 \
  1589. ] \
  1590.     #( 'element not found' #indexOfSubCollection:startingAt:ifAbsent:  ) ) >
  1591.  
  1592. <primitive 112 temp 11        " indexOfSubCollection:startingAt:ifAbsent: " \
  1593.     #( #[ 34 116 32 163 33 163 193 117 36 37 200 247 17 33 32 \
  1594.  36 221 247 2 36 243 242 36 81 192 241 116 242 249 22 \
  1595.  242 35 165 243 245] \
  1596.     #(  ) ) >
  1597.  
  1598. <primitive 112 temp 12        " findLast:ifAbsent: " \
  1599.     #( #[ 32 225 3 9 33 35 180 247 3 32 171 244 243 11 42 \
  1600.  242 34 165 243 245] \
  1601.     #(  ) ) >
  1602.  
  1603. <primitive 112 temp 13        " findLast: " \
  1604.     #( #[ 32 33 224 4 32 48 188 243 220 242 245] \
  1605.     #( 'last element not found'  ) ) >
  1606.  
  1607. <primitive 112 temp 14        " findFirst:ifAbsent: " \
  1608.     #( #[ 32 225 3 9 33 35 180 247 3 32 171 244 243 179 242 \
  1609.  34 165 243 245] \
  1610.     #(  ) ) >
  1611.  
  1612. <primitive 112 temp 15        " findFirst: " \
  1613.     #( #[ 32 33 224 4 32 48 188 243 219 243 245] \
  1614.     #( 'first element not found'  ) ) >
  1615.  
  1616. <primitive 112 temp 16        " equals:startingAt: " \
  1617.     #( #[ 80 115 32 225 4 22 36 33 34 35 192 224 2 92 244 \
  1618.  213 201 246 2 92 244 242 35 81 192 241 115 243 179 242 \
  1619.  91 243 245] \
  1620.     #(  ) ) >
  1621.  
  1622. <primitive 112 temp 17        " copyWithout: " \
  1623.     #( #[ 5 48 160 114 32 225 3 10 35 33 181 246 4 34 35 \
  1624.  11 22 243 179 242 32 34 191 243 245] \
  1625.     #(  ) ) >
  1626.  
  1627. <primitive 112 temp 18        " copyWith: " \
  1628.     #( #[ 32 5 48 160 241 32 11 20 242 241 33 11 22 242 191 \
  1629.  243 245] \
  1630.     #(  ) ) >
  1631.  
  1632. <primitive 112 temp 19        " copyFrom:to: " \
  1633.     #( #[ 5 48 160 115 33 34 178 225 4 7 35 32 36 177 11 \
  1634.  22 243 179 242 32 35 191 243 245] \
  1635.     #(  ) ) >
  1636.  
  1637. <primitive 112 temp 20        " collect: " \
  1638.     #( #[ 32 32 5 48 160 226 2 9 34 33 35 180 11 22 242 \
  1639.  34 243 215 191 243 245] \
  1640.     #(  ) ) >
  1641.  
  1642. <primitive 112 temp 21        " , " \
  1643.     #( #[ 32 5 48 160 241 32 11 20 242 241 33 11 20 242 191 \
  1644.  243 245] \
  1645.     #(  ) ) >
  1646.  
  1647. <primitive 98 #SequenceableCollection \
  1648.     <primitive 97 #SequenceableCollection #KeyedCollection #\smalltlk\prelude\scollect.st \
  1649.     #(  ) \
  1650.     #( #with:do: #sort: #sort #select: #reversed #reverseDo: #replaceFrom:to:with:startingAt: #replaceFrom:to:with: #last #indexOfSubCollection:startingAt: #indexOfSubCollection:startingAt:ifAbsent: #findLast:ifAbsent: #findLast: #findFirst:ifAbsent: #findFirst: #equals:startingAt: #copyWithout: #copyWith: #copyFrom:to: #collect: #,  ) \
  1651.     temp 6 9 > >
  1652.  
  1653. temp <- <primitive 110 13 >
  1654. <primitive 112 temp 1        " shallowCopy " \
  1655.     #( #[ 16 17 18 212 243 245] \
  1656.     #(  ) ) >
  1657.  
  1658. <primitive 112 temp 2        " deepCopy " \
  1659.     #( #[ 16 17 18 212 243 245] \
  1660.     #(  ) ) >
  1661.  
  1662. <primitive 112 temp 3        " removeKey:ifAbsent: " \
  1663.     #( #[ 32 48 188 242 34 165 243 245] \
  1664.     #( 'cannot remove from Interval'  ) ) >
  1665.  
  1666. <primitive 112 temp 4        " add: " \
  1667.     #( #[ 32 48 188 243 245] \
  1668.     #( 'cannot store into Interval'  ) ) >
  1669.  
  1670. <primitive 112 temp 5        " at:put: " \
  1671.     #( #[ 32 48 188 243 245] \
  1672.     #( 'cannot store into Interval'  ) ) >
  1673.  
  1674. <primitive 112 temp 6        " coerce: " \
  1675.     #( #[ 33 174 243 245] \
  1676.     #(  ) ) >
  1677.  
  1678. <primitive 112 temp 7        " printString " \
  1679.     #( #[ 48 16 169 11 17 49 11 17 17 169 11 17 50 11 17 \
  1680.  18 169 11 17 243 245] \
  1681.     #( 'Interval ' ' to ' ' by '  ) ) >
  1682.  
  1683. <primitive 112 temp 8        " at:ifAbsent: " \
  1684.     #( #[ 16 18 33 81 193 194 192 115 32 35 11 31 247 3 35 \
  1685.  248 3 242 34 165 243 245] \
  1686.     #(  ) ) >
  1687.  
  1688. <primitive 112 temp 9        " next " \
  1689.     #( #[ 19 18 192 99 32 19 11 31 247 1 19 243 245] \
  1690.     #(  ) ) >
  1691.  
  1692. <primitive 112 temp 10        " first " \
  1693.     #( #[ 16 99 32 19 11 31 247 1 19 243 245] \
  1694.     #(  ) ) >
  1695.  
  1696. <primitive 112 temp 11        " inRange: " \
  1697.     #( #[ 18 170 247 10 33 16 203 252 3 33 17 200 248 9 242 \
  1698.  33 17 203 252 3 33 16 200 243 245] \
  1699.     #(  ) ) >
  1700.  
  1701. <primitive 112 temp 12        " size " \
  1702.     #( #[ 18 170 247 5 17 16 199 248 4 242 16 17 199 247 3 \
  1703.  80 248 9 242 17 16 193 18 11 18 81 192 243 245] \
  1704.     #(  ) ) >
  1705.  
  1706. <primitive 112 temp 13        " from:to:by: " \
  1707.     #( #[ 33 241 96 99 34 97 35 98 245] \
  1708.     #(  ) ) >
  1709.  
  1710. <primitive 98 #Interval \
  1711.     <primitive 97 #Interval #SequenceableCollection #\smalltlk\prelude\interval.st \
  1712.     #(  #lower #upper #step #current ) \
  1713.     #( #shallowCopy #deepCopy #removeKey:ifAbsent: #add: #at:put: #coerce: #printString #at:ifAbsent: #next #first #inRange: #size #from:to:by:  ) \
  1714.     temp 4 5 > >
  1715.  
  1716. temp <- <primitive 110 17 >
  1717. <primitive 112 temp 1        " isEmpty " \
  1718.     #( #[ 16 93 181 243 245] \
  1719.     #(  ) ) >
  1720.  
  1721. <primitive 112 temp 2        " last " \
  1722.     #( #[ 16 161 247 2 93 243 242 32 10 24 10 49 243 245] \
  1723.     #(  ) ) >
  1724.  
  1725. <primitive 112 temp 3        " current " \
  1726.     #( #[ 17 10 49 243 245] \
  1727.     #(  ) ) >
  1728.  
  1729. <primitive 112 temp 4        " next " \
  1730.     #( #[ 17 10 50 241 97 162 247 3 17 10 49 243 245] \
  1731.     #(  ) ) >
  1732.  
  1733. <primitive 112 temp 5        " first " \
  1734.     #( #[ 16 241 97 162 247 3 17 10 49 243 245] \
  1735.     #(  ) ) >
  1736.  
  1737. <primitive 112 temp 6        " removeLast " \
  1738.     #( #[ 16 161 247 4 32 10 37 243 242 32 32 10 30 224 4 \
  1739.  32 10 37 243 216 243 245] \
  1740.     #(  ) ) >
  1741.  
  1742. <primitive 112 temp 7        " removeFirst " \
  1743.     #( #[ 16 161 247 4 32 10 37 243 242 16 113 16 10 50 96 \
  1744.  33 10 49 243 245] \
  1745.     #(  ) ) >
  1746.  
  1747. <primitive 112 temp 8        " removeError " \
  1748.     #( #[ 32 48 188 243 245] \
  1749.     #( 'cannot remove from an empty list'  ) ) >
  1750.  
  1751. <primitive 112 temp 9        " remove:ifAbsent: " \
  1752.     #( #[ 16 161 247 3 34 165 243 242 32 93 226 3 31 17 10 \
  1753.  49 33 181 247 21 35 161 247 7 17 10 50 241 96 248 \
  1754.  7 242 35 17 10 50 11 51 242 33 244 242 17 243 215 \
  1755.  242 34 165 243 245] \
  1756.     #(  ) ) >
  1757.  
  1758. <primitive 112 temp 10        " remove: " \
  1759.     #( #[ 32 33 224 4 32 48 188 243 216 243 245] \
  1760.     #( 'cant find item'  ) ) >
  1761.  
  1762. <primitive 112 temp 11        " findLast " \
  1763.     #( #[ 16 241 113 161 247 2 93 243 242 33 10 50 162 247 8 \
  1764.  33 10 50 241 113 242 249 14 242 33 243 245] \
  1765.     #(  ) ) >
  1766.  
  1767. <primitive 112 temp 12        " coerce: " \
  1768.     #( #[ 5 48 160 114 33 225 3 5 34 35 11 22 243 179 242 \
  1769.  34 243 245] \
  1770.     #(  ) ) >
  1771.  
  1772. <primitive 112 temp 13        " addAllLast: " \
  1773.     #( #[ 33 225 2 5 32 34 11 22 243 179 242 245] \
  1774.     #(  ) ) >
  1775.  
  1776. <primitive 112 temp 14        " addAllFirst: " \
  1777.     #( #[ 33 225 2 5 32 34 11 21 243 179 242 245] \
  1778.     #(  ) ) >
  1779.  
  1780. <primitive 112 temp 15        " addLast: " \
  1781.     #( #[ 16 161 247 5 32 33 11 21 243 242 32 10 24 5 53 \
  1782.  160 33 11 50 93 11 51 11 51 242 33 243 245] \
  1783.     #(  ) ) >
  1784.  
  1785. <primitive 112 temp 16        " addFirst: " \
  1786.     #( #[ 5 53 160 33 11 50 16 11 51 96 33 243 245] \
  1787.     #(  ) ) >
  1788.  
  1789. <primitive 112 temp 17        " add: " \
  1790.     #( #[ 5 53 160 33 11 50 16 11 51 96 33 243 245] \
  1791.     #(  ) ) >
  1792.  
  1793. <primitive 98 #List \
  1794.     <primitive 97 #List #SequenceableCollection #\smalltlk\prelude\list.st \
  1795.     #(  #first #current ) \
  1796.     #( #isEmpty #last #current #next #first #removeLast #removeFirst #removeError #remove:ifAbsent: #remove: #findLast #coerce: #addAllLast: #addAllFirst: #addLast: #addFirst: #add:  ) \
  1797.     temp 5 8 > >
  1798.  
  1799. temp <- <primitive 110 13 >
  1800. <primitive 112 temp 1        " shallowCopy " \
  1801.     #( #[ 32 164 32 163 176 113 81 32 163 178 225 2 7 33 34 \
  1802.  32 34 177 208 243 179 242 33 243 245] \
  1803.     #(  ) ) >
  1804.  
  1805. <primitive 112 temp 2        " padTo: " \
  1806.     #( #[ 32 163 33 199 247 12 32 32 164 33 32 163 193 176 11 \
  1807.  17 248 2 242 32 243 245] \
  1808.     #(  ) ) >
  1809.  
  1810. <primitive 112 temp 3        " next " \
  1811.     #( #[ 16 81 192 96 16 32 163 200 247 3 32 16 177 243 245 \
  1812. ] \
  1813.     #(  ) ) >
  1814.  
  1815. <primitive 112 temp 4        " lastKey " \
  1816.     #( #[ 32 163 243 245] \
  1817.     #(  ) ) >
  1818.  
  1819. <primitive 112 temp 5        " firstKey " \
  1820.     #( #[ 81 243 245] \
  1821.     #(  ) ) >
  1822.  
  1823. <primitive 112 temp 6        " first " \
  1824.     #( #[ 81 96 16 32 163 200 247 3 32 16 177 243 245] \
  1825.     #(  ) ) >
  1826.  
  1827. <primitive 112 temp 7        " do: " \
  1828.     #( #[ 81 32 163 178 225 2 8 34 96 33 32 34 177 180 243 \
  1829.  179 242 245] \
  1830.     #(  ) ) >
  1831.  
  1832. <primitive 112 temp 8        " deepCopy " \
  1833.     #( #[ 32 164 32 163 176 113 81 32 163 178 225 2 9 33 34 \
  1834.  32 34 177 10 20 208 243 179 242 33 243 245] \
  1835.     #(  ) ) >
  1836.  
  1837. <primitive 112 temp 9        " currentKey " \
  1838.     #( #[ 16 243 245] \
  1839.     #(  ) ) >
  1840.  
  1841. <primitive 112 temp 10        " copyFrom:to: " \
  1842.     #( #[ 34 33 193 81 192 115 32 164 35 176 116 36 81 35 32 \
  1843.  33 132 0 242 36 243 245] \
  1844.     #( #replaceFrom:to:with:startingAt:  ) ) >
  1845.  
  1846. <primitive 112 temp 11        " coerce: " \
  1847.     #( #[ 32 164 33 163 176 114 34 81 33 163 33 131 0 242 34 \
  1848.  243 245] \
  1849.     #( #replaceFrom:to:with:  ) ) >
  1850.  
  1851. <primitive 112 temp 12        " at:ifAbsent: " \
  1852.     #( #[ 33 80 200 251 4 33 32 163 204 247 3 34 165 243 242 \
  1853.  32 33 177 243 245] \
  1854.     #(  ) ) >
  1855.  
  1856. <primitive 112 temp 13        " = " \
  1857.     #( #[ 32 163 33 163 202 247 2 92 243 242 80 114 32 225 3 \
  1858.  14 35 33 34 81 192 241 114 177 202 247 2 92 244 243 \
  1859.  179 242 91 243 245] \
  1860.     #(  ) ) >
  1861.  
  1862. <primitive 98 #ArrayedCollection \
  1863.     <primitive 97 #ArrayedCollection #SequenceableCollection #\smalltlk\prelude\acollect.st \
  1864.     #(  #current ) \
  1865.     #( #shallowCopy #padTo: #next #lastKey #firstKey #first #do: #deepCopy #currentKey #copyFrom:to: #coerce: #at:ifAbsent: #=  ) \
  1866.     temp 5 7 > >
  1867.  
  1868. temp <- <primitive 110 1 >
  1869. <primitive 112 temp 1        " main " \
  1870.     #( #[ 5 42 160 241 48 129 1 242 113 5 42 160 241 50 51 \
  1871.  130 4 242 114 33 225 3 7 34 35 128 5 11 49 243 \
  1872.  179 242 5 42 160 241 50 54 130 4 242 114 34 225 3 \
  1873.  3 35 168 243 179 242 33 128 7 242 33 166 168 242 56 \
  1874.  224 4 33 167 168 243 183 242 33 82 177 168 242 33 171 \
  1875.  168 242 33 163 168 242 245] \
  1876.     #( 'file.st' #open: 'foo' 'w' #open:for: #reversed 'r' #modeCharacter 10  ) ) >
  1877.  
  1878. <primitive 98 #Main \
  1879.     <primitive 97 #Main #Object #\smalltlk\prelude\file.st \
  1880.     #(  ) \
  1881.     #( #main  ) \
  1882.     temp 4 9 > >
  1883.  
  1884. temp <- <primitive 110 5 >
  1885. <primitive 112 temp 1        " size " \
  1886.     #( #[ 32 250 1 117 243 245] \
  1887.     #(  ) ) >
  1888.  
  1889. <primitive 112 temp 2        " printString " \
  1890.     #( #[ 48 113 81 32 163 178 225 2 13 33 32 34 177 169 11 \
  1891.  17 49 11 17 241 113 243 179 242 33 50 11 17 243 245 \
  1892. ] \
  1893.     #( '#[ ' ' ' ']'  ) ) >
  1894.  
  1895. <primitive 112 temp 3        " at:put: " \
  1896.     #( #[ 32 33 34 250 3 119 242 245] \
  1897.     #(  ) ) >
  1898.  
  1899. <primitive 112 temp 4        " at: " \
  1900.     #( #[ 32 33 250 2 118 243 245] \
  1901.     #(  ) ) >
  1902.  
  1903. <primitive 112 temp 5        " new: " \
  1904.     #( #[ 33 250 1 116 243 245] \
  1905.     #(  ) ) >
  1906.  
  1907. <primitive 98 #ByteArray \
  1908.     <primitive 97 #ByteArray #ArrayedCollection #\smalltlk\prelude\bytearra.st \
  1909.     #(  ) \
  1910.     #( #size #printString #at:put: #at: #new:  ) \
  1911.     temp 3 6 > >
  1912.  
  1913. temp <- <primitive 110 4 >
  1914. <primitive 112 temp 1        " wait " \
  1915.     #( #[ 250 0 148 242 16 80 201 247 10 32 95 11 22 242 95 \
  1916.  10 18 248 6 242 16 81 193 241 96 242 250 0 149 242 \
  1917.  245] \
  1918.     #(  ) ) >
  1919.  
  1920. <primitive 112 temp 2        " signal " \
  1921.     #( #[ 250 0 148 242 32 10 27 247 7 16 81 192 241 96 248 \
  1922.  6 242 32 10 38 10 48 242 250 0 149 242 245] \
  1923.     #(  ) ) >
  1924.  
  1925. <primitive 112 temp 3        " new: " \
  1926.     #( #[ 33 96 245] \
  1927.     #(  ) ) >
  1928.  
  1929. <primitive 112 temp 4        " new " \
  1930.     #( #[ 80 96 245] \
  1931.     #(  ) ) >
  1932.  
  1933. <primitive 98 #Semaphore \
  1934.     <primitive 97 #Semaphore #List #\smalltlk\prelude\semaphor.st \
  1935.     #(  #excessSignals ) \
  1936.     #( #wait #signal #new: #new  ) \
  1937.     temp 2 4 > >
  1938.  
  1939. temp <- <primitive 110 8 >
  1940. <primitive 112 temp 1        " yield " \
  1941.     #( #[ 93 243 245] \
  1942.     #(  ) ) >
  1943.  
  1944. <primitive 112 temp 2        " unblock " \
  1945.     #( #[ 32 10 45 48 181 247 7 32 49 11 47 242 93 243 242 \
  1946.  32 83 250 2 145 242 32 10 45 243 245] \
  1947.     #( #TERMINATED 'unblock'  ) ) >
  1948.  
  1949. <primitive 112 temp 3        " termErr: " \
  1950.     #( #[ 48 33 11 17 49 11 17 168 242 245] \
  1951.     #( 'Cannot ' ' a terminated process.'  ) ) >
  1952.  
  1953. <primitive 112 temp 4        " terminate " \
  1954.     #( #[ 32 250 1 142 242 32 10 45 243 245] \
  1955.     #(  ) ) >
  1956.  
  1957. <primitive 112 temp 5        " state " \
  1958.     #( #[ 32 250 1 146 113 33 80 201 247 4 48 113 33 243 242 \
  1959.  33 81 201 247 4 49 113 33 243 242 33 82 201 247 4 \
  1960.  50 113 33 243 242 33 83 201 247 4 50 113 33 243 242 \
  1961.  33 84 203 247 4 51 113 33 243 242 245] \
  1962.     #( #READY #SUSPENDED #BLOCKED #TERMINATED  ) ) >
  1963.  
  1964. <primitive 112 temp 6        " suspend " \
  1965.     #( #[ 32 10 45 48 181 247 7 32 49 11 47 242 93 243 242 \
  1966.  32 81 250 2 145 242 32 10 45 243 245] \
  1967.     #( #TERMINATED 'suspend'  ) ) >
  1968.  
  1969. <primitive 112 temp 7        " resume " \
  1970.     #( #[ 32 10 45 48 181 247 7 32 49 11 47 242 93 243 242 \
  1971.  32 80 250 2 145 242 32 10 45 243 245] \
  1972.     #( #TERMINATED 'resume'  ) ) >
  1973.  
  1974. <primitive 112 temp 8        " block " \
  1975.     #( #[ 32 10 45 48 181 247 7 32 49 11 47 242 93 243 242 \
  1976.  32 82 250 2 145 242 32 10 45 243 245] \
  1977.     #( #TERMINATED 'block'  ) ) >
  1978.  
  1979. <primitive 98 #Process \
  1980.     <primitive 97 #Process #Object #\smalltlk\prelude\process.st \
  1981.     #(  ) \
  1982.     #( #yield #unblock #termErr: #terminate #state #suspend #resume #block  ) \
  1983.     temp 2 4 > >
  1984.  
  1985. temp <- <primitive 110 11 >
  1986. <primitive 112 temp 1        " time: " \
  1987.     #( #[ 250 0 161 114 33 165 242 250 0 161 34 193 243 245] \
  1988.     #(  ) ) >
  1989.  
  1990. <primitive 112 temp 2        " sh: " \
  1991.     #( #[ 33 250 1 125 243 245] \
  1992.     #(  ) ) >
  1993.  
  1994. <primitive 112 temp 3        " perform:withArguments: " \
  1995.     #( #[ 34 33 250 2 143 243 245] \
  1996.     #(  ) ) >
  1997.  
  1998. <primitive 112 temp 4        " noDisplay " \
  1999.     #( #[ 81 80 250 2 8 243 245] \
  2000.     #(  ) ) >
  2001.  
  2002. <primitive 112 temp 5        " getString " \
  2003.     #( #[ 250 0 163 243 245] \
  2004.     #(  ) ) >
  2005.  
  2006. <primitive 112 temp 6        " doPrimitive:withArguments: " \
  2007.     #( #[ 33 34 250 2 30 243 245] \
  2008.     #(  ) ) >
  2009.  
  2010. <primitive 112 temp 7        " displayAssign " \
  2011.     #( #[ 81 82 250 2 8 243 245] \
  2012.     #(  ) ) >
  2013.  
  2014. <primitive 112 temp 8        " display " \
  2015.     #( #[ 81 81 250 2 8 243 245] \
  2016.     #(  ) ) >
  2017.  
  2018. <primitive 112 temp 9        " debug: " \
  2019.     #( #[ 82 33 250 2 8 243 245] \
  2020.     #(  ) ) >
  2021.  
  2022. <primitive 112 temp 10        " date " \
  2023.     #( #[ 250 0 160 243 245] \
  2024.     #(  ) ) >
  2025.  
  2026. <primitive 112 temp 11        " clearScreen " \
  2027.     #( #[ 250 0 162 242 245] \
  2028.     #(  ) ) >
  2029.  
  2030. <primitive 98 #Smalltalk \
  2031.     <primitive 97 #Smalltalk #Dictionary #\smalltlk\prelude\smalltal.st \
  2032.     #(  ) \
  2033.     #( #time: #sh: #perform:withArguments: #noDisplay #getString #doPrimitive:withArguments: #displayAssign #display #debug: #date #clearScreen  ) \
  2034.     temp 3 3 > >
  2035.  
  2036. smalltalk new
  2037.